
# d.fig-- removes lines from text buffer
# Copyright (C) 2021 mn
#
# This program is free software: you can redistribute it and/or modify 
#
# it under the terms of the GNU Affero General Public License as published by 
# the Free Software Foundation, either version 3 of the License, or 
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful, 
# but WITHOUT ANY WARRANTY; without even the implied warranty of 
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 
# GNU Affero General Public License for more details.
#
# You should have received a copy of the GNU Affero General Public License 
# along with this program. If not, see <http://www.gnu.org/licenses/>.

function vget g k
python
    return g[k]
    fig
    fig

function vset g k v
python
    g[k] = v
    return g
    fig
    fig

function d buf params
    gt vget params "token"
    pad arr mid 1 0
    blen buf len
    bs gt ltrim rtrim split bs " " left 1 mid 1 1 val
    bf gt ltrim rtrim split bf " " right 1 mid 1 1 val
    for bwhere 1 blen 1
        ifless bwhere bs
            now arrget buf bwhere
            pad plus now
        else
            ifmore bwhere bf
                now arrget buf bwhere
                pad plus now
                fig
            fig
        next
    now vset params "text" pad
    params now return params
    fig

